(line-move-finish): Ignore fields computing LINE-END.

diff --git a/lisp/simple.el b/lisp/simple.el
index efe1559cb4df70b06ac43b529b84989d3da39b9e..8fbfaffaec6800fe9fa5e5d71501340bf971f7a6 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -3541,10 +3541,11 @@ Outline mode sets this."
             ;; Compute the end of the line
             ;; ignoring effectively invisible newlines.
             (save-excursion
-              (end-of-line)
+              ;; Like end-of-line but ignores fields.
+              (skip-chars-forward "^\n")
               (while (and (not (eobp)) (line-move-invisible-p (point)))
                 (goto-char (next-char-property-change (point)))
-                (end-of-line))
+                (skip-chars-forward "^\n"))
               (point))))
 
        ;; Move to the desired column.